home *** CD-ROM | disk | FTP | other *** search
/ PC Pro 2005 December / DPPCPRO1205.ISO / Assets / Interface / Main.dxr / Behaviours_1_Banner press.ls next >
Encoding:
Text File  |  2005-05-20  |  500 b   |  26 lines
  1. global dataSource
  2.  
  3. on mouseUp me
  4.   cursor(-1)
  5.   secNum = sprite("Content pane").sections.selectedIndex + 1
  6.   bannerSource = dataSource.findBanner(integer(secNum))
  7.   bannerTarget = bannerSource.attributeValue["href"]
  8.   if bannerTarget = VOID then
  9.     popupDialog(bannerSource)
  10.   else
  11.     if bannerTarget.char[1..4] = "http" then
  12.       launch(bannerTarget)
  13.     else
  14.       launch(getVolume() & bannerTarget)
  15.     end if
  16.   end if
  17. end
  18.  
  19. on mouseEnter me
  20.   cursor(280)
  21. end
  22.  
  23. on mouseLeave me
  24.   cursor(-1)
  25. end
  26.